'''
''' Override the SaveData() function to reset the CheckSum for the record
''' so that the record can be saved even if it was modified in the database.
''' CAUTION: We recommend you apply this customization only in very special circumstances.
'''
Public Overrides Sub SaveData()
' (re)set the current control's record's CheckSum to Nothing
Me.CheckSum = Nothing
MyBase.SaveData()
End Sub
|